home *** CD-ROM | disk | FTP | other *** search
/ Amiga Magazin: Amiga-CD 1996 September & October / Amiga-CD 1996 #9-10.iso / demos / storm-c / stormwizard / wizard install-script < prev   
Encoding:
Text File  |  1996-01-20  |  2.5 KB  |  100 lines
  1. ; $VER: StormWIZARD V1.06 Install Version 1.02 (2.7.96)
  2. ; Installatiert StormWizard auf der Festplatte
  3. ;
  4. ; (c) 1996 HAAGE & PARTNER Computer GmbH
  5.  
  6. (complete 0)
  7.  
  8. ; Die Versionsnummer und das Erstellungs-Datum der hier installierten
  9. ; Versionen.
  10.  
  11. (set stw-version "1.06")
  12. (set stw-date "(25 Jun 96)")
  13.  
  14. ;====================================================================
  15. ; Initialisierungen
  16.  
  17. (set @default-dest "")
  18.  
  19. (set os-version (/ (getversion) 65536))
  20. (set os-13 (< os-version 36))
  21. (set os-20 (>= os-version 36))
  22. (set os-21 (>= os-version 38))
  23.  
  24. (set totalmem (database "total-mem")) ; Diese schöne Funktion vereinfacht einiges
  25.  
  26. ; Die Pfadnamen der Programme, die vom Installations-Skript aufgerufen werden.
  27.  
  28. ; Die Pfadnamen der einzelnen Quell-Dateien.
  29.  
  30. (set #libfile                (tackon (pathonly @icon) "LIBS/Wizard.library"))        ; Hier stehen die Bibliothek
  31.  
  32. (set #prp-copy-lib
  33.     "Kopiere die WIZARD-LIBRARY\n")
  34. (set #hlp-copy-lib
  35.     "Ohne das aktuelle Herzstück von StormWIZARD, funktioniert nichts!")
  36.  
  37. ;=====================================================================================
  38. ; Beginn der Installation
  39. ;=====================================================================================
  40.  
  41. ; Eine kleine Einleitung, gefolgt vom Startbild des Installers.
  42.  
  43. (set act-user-level @user-level)
  44. (user 1)
  45.  
  46. (message (cat    "\nWillkommen bei der Installation der \n\n\"StormWIZARD-Demoversion "
  47.                      stw-version " vom "stw-date "\"!\n\n"
  48.                     "Dieses Skript kopiert die Library von StormWizard, "
  49.                     "auf Ihre Festplatte und erzeugt einen Assign.\n\n\n"
  50.                     "© Copyright 1996 HAAGE & PARTNER Computer GmbH"))
  51.  
  52. (user act-user-level)
  53. (welcome)
  54.  
  55.  
  56. (complete 5)
  57.  
  58. ; Wizard.Library in die Libs-Schublade kopieren!
  59.  
  60. (copylib
  61.     (prompt #prp-copy-lib)
  62.     (help #hlp-copy-lib)
  63.     (source #libfile)
  64.     (dest "LIBS:")
  65.     (confirm)
  66. )
  67.  
  68. (complete 95)
  69.  
  70. ; ------- STARTUP ÄNDERN
  71.  
  72. (set command1 (cat  "ASSIGN STORMWIZARD: " (pathonly @icon) ""))
  73.  
  74. (set command1.txt
  75.     (cat 
  76.          "\n\n\nUm mit StromWIZARD richtig arbeiten zu "
  77.       "können muß eine Änderung an der User-Startup vorgenommen werden.\n\n"
  78.          command1
  79.     )
  80. )
  81.  
  82. (startup "StormWIZARD"
  83.     (prompt command1.txt)
  84.     (help #help-startup)
  85.     (command command1)
  86. )
  87.  
  88. (makeassign "STORMWIZARD")
  89. (makeassign "STORMWIZARD" (pathonly @icon))
  90.  
  91. (complete 100)
  92.  
  93. ; ------- FERTIG
  94.  
  95. (message (cat 
  96.     "\nInstallation von StormWIZARD beendet.\n\n"
  97.    "Falls die Zeilen:\n" command1 "\nnicht in Ihre Startup-Sequence bzw. "
  98.    "User-Startup eingefügt wurde, dann holen Sie dies bitte nach.\n\n"
  99.    "\n\nWir wünschen ihnen viel Erfolg mit StormWIZARD!")
  100. )